Namespace HBBSoft.Pivot

    <System.Serializable()> Public MustInherit Class DataSource
        Dim _Name As String
        Public Property Name() As String
            Get
                Return _Name
            End Get
            Set(ByVal value As String)
                _Name = value
            End Set
        End Property

        Dim _ConnectionString As String
        Public Property ConnectionString() As String
            Get
                Return _ConnectionString
            End Get
            Set(ByVal value As String)
                _ConnectionString = value
            End Set
        End Property


        Friend MustOverride Sub Refresh(ByRef ept As PivotTable)
        Friend MustOverride Function Open() As Object
        Friend MustOverride Sub Close(ByRef Connction As Object)
        Friend MustOverride Function GetChildren(ByRef mem As Member, ByVal BaseID As Integer, ByRef ept As PivotTable) As MemberCollection
        Friend MustOverride Function GetFilterTree(ByRef objDimension As Dimension, ByRef FilterMembers As MemberCollection, ByRef ept As PivotTable) As MemberCollection

    End Class
End Namespace